home *** CD-ROM | disk | FTP | other *** search
/ Mantenimiento Redes Del PC / Mantenimiento Redes Del PC.iso / recomen / ccopy95 / ccopy95.exe / 0 / RCDATA / TBATCHDLG / TBATCHDLG.txt < prev   
Text File  |  1997-04-12  |  9KB  |  319 lines
  1. object BatchDlg: TBatchDlg
  2.   Left = 235
  3.   Top = 125
  4.   HelpContext = 4
  5.   ActiveControl = SDirList
  6.   BorderIcons = [biSystemMenu, biMinimize]
  7.   BorderStyle = bsSingle
  8.   Caption = 'Batch Editor (Untitled)'
  9.   ClientHeight = 305
  10.   ClientWidth = 570
  11.   Font.Color = clWindowText
  12.   Font.Height = -13
  13.   Font.Name = 'System'
  14.   Font.Style = []
  15.   Icon.Data = {<image000.ico>}
  16.   Menu = BatchMenu
  17.   Position = poScreenCenter
  18.   OnCreate = FormCreate
  19.   PixelsPerInch = 96
  20.   TextHeight = 16
  21.   object SourceLabel: TLabel
  22.     Left = 10
  23.     Top = 10
  24.     Width = 135
  25.     Height = 13
  26.     Caption = 'D:\DATA\CCopy Win95'
  27.     Font.Color = clBlack
  28.     Font.Height = -11
  29.     Font.Name = 'MS Sans Serif'
  30.     Font.Style = [fsBold]
  31.     ParentFont = False
  32.   end
  33.   object Label1: TLabel
  34.     Left = 10
  35.     Top = 185
  36.     Width = 102
  37.     Height = 13
  38.     Caption = 'List Files of &Type:'
  39.     FocusControl = FilterComboBox1
  40.     Font.Color = clBlack
  41.     Font.Height = -11
  42.     Font.Name = 'MS Sans Serif'
  43.     Font.Style = [fsBold]
  44.     ParentFont = False
  45.   end
  46.   object Label4: TLabel
  47.     Left = 10
  48.     Top = 235
  49.     Width = 41
  50.     Height = 13
  51.     Caption = 'Dri&ves:'
  52.     FocusControl = DriveComboBox1
  53.     Font.Color = clBlack
  54.     Font.Height = -11
  55.     Font.Name = 'MS Sans Serif'
  56.     Font.Style = [fsBold]
  57.     ParentFont = False
  58.   end
  59.   object SpeedButton3: TSpeedButton
  60.     Left = 310
  61.     Top = 63
  62.     Width = 25
  63.     Height = 25
  64.     Font.Color = clBlack
  65.     Font.Height = -13
  66.     Font.Name = 'MS Sans Serif'
  67.     Font.Style = [fsBold]
  68.     Glyph.Data = {
  69.       78010000424D7801000000000000760000002800000020000000100000000100
  70.       04000000000000000000120B0000120B00000000000000000000000000000000
  71.       800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
  72.       FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
  73.       3333333333333333333333333333333333333333333333333333333333333333
  74.       3333333333333FF3333333333333003333333333333F77F33333333333009033
  75.       333333333F7737F333333333009990333333333F773337FFFFFF330099999000
  76.       00003F773333377777770099999999999990773FF33333FFFFF7330099999000
  77.       000033773FF33777777733330099903333333333773FF7F33333333333009033
  78.       33333333337737F3333333333333003333333333333377333333333333333333
  79.       3333333333333333333333333333333333333333333333333333333333333333
  80.       33333333333333333333333333333333333333333333333333330000}
  81.     NumGlyphs = 2
  82.     ParentFont = False
  83.     OnClick = SpeedButton3Click
  84.   end
  85.   object SpeedButton4: TSpeedButton
  86.     Left = 310
  87.     Top = 100
  88.     Width = 25
  89.     Height = 25
  90.     Font.Color = clBlack
  91.     Font.Height = -13
  92.     Font.Name = 'MS Sans Serif'
  93.     Font.Style = [fsBold]
  94.     Glyph.Data = {
  95.       78010000424D7801000000000000760000002800000020000000100000000100
  96.       04000000000000000000120B0000120B00000000000000000000000000000000
  97.       800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
  98.       FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
  99.       3333333333333333333333333333333333333333333333333333333333333333
  100.       3333333333333333333333333333333333333333333FF3333333333333003333
  101.       3333333333773FF3333333333309003333333333337F773FF333333333099900
  102.       33333FFFFF7F33773FF30000000999990033777777733333773F099999999999
  103.       99007FFFFFFF33333F7700000009999900337777777F333F7733333333099900
  104.       33333333337F3F77333333333309003333333333337F77333333333333003333
  105.       3333333333773333333333333333333333333333333333333333333333333333
  106.       33333333333333333333333333333333333333333333333333330000}
  107.     NumGlyphs = 2
  108.     ParentFont = False
  109.     OnClick = SpeedButton4Click
  110.   end
  111.   object BatchListLabel: TLabel
  112.     Left = 345
  113.     Top = 10
  114.     Width = 132
  115.     Height = 13
  116.     Caption = 'Files to Batch Process:'
  117.     Font.Color = clBlack
  118.     Font.Height = -11
  119.     Font.Name = 'MS Sans Serif'
  120.     Font.Style = [fsBold]
  121.     ParentFont = False
  122.   end
  123.   object Bevel1: TBevel
  124.     Left = 0
  125.     Top = 284
  126.     Width = 570
  127.     Height = 21
  128.     Align = alBottom
  129.   end
  130.   object Bevel3: TBevel
  131.     Left = -10
  132.     Top = 281
  133.     Width = 581
  134.     Height = 2
  135.     Shape = bsTopLine
  136.   end
  137.   object FileList: TFileListBox
  138.     Left = 166
  139.     Top = 30
  140.     Width = 133
  141.     Height = 132
  142.     Hint = 'Double Click to Add'
  143.     DragCursor = crMultiDrag
  144.     Font.Color = clBlack
  145.     Font.Height = -11
  146.     Font.Name = 'MS Sans Serif'
  147.     Font.Style = [fsBold]
  148.     IntegralHeight = True
  149.     ItemHeight = 16
  150.     Mask = '*.ini'
  151.     MultiSelect = True
  152.     ParentFont = False
  153.     ParentShowHint = False
  154.     ShowGlyphs = True
  155.     ShowHint = True
  156.     TabOrder = 1
  157.     OnDblClick = FileListDblClick
  158.   end
  159.   object SDirList: TDirectoryListBox
  160.     Left = 10
  161.     Top = 30
  162.     Width = 146
  163.     Height = 132
  164.     DirLabel = SourceLabel
  165.     DragCursor = crNoDrop
  166.     FileList = FileList
  167.     Font.Color = clBlack
  168.     Font.Height = -11
  169.     Font.Name = 'MS Sans Serif'
  170.     Font.Style = [fsBold]
  171.     IntegralHeight = True
  172.     ItemHeight = 16
  173.     ParentFont = False
  174.     TabOrder = 0
  175.   end
  176.   object DriveComboBox1: TDriveComboBox
  177.     Left = 10
  178.     Top = 255
  179.     Width = 197
  180.     Height = 19
  181.     DirList = SDirList
  182.     Font.Color = clBlack
  183.     Font.Height = -11
  184.     Font.Name = 'MS Sans Serif'
  185.     Font.Style = [fsBold]
  186.     ParentFont = False
  187.     TabOrder = 4
  188.   end
  189.   object FilterComboBox1: TFilterComboBox
  190.     Left = 10
  191.     Top = 205
  192.     Width = 197
  193.     Height = 21
  194.     FileList = FileList
  195.     Filter = 'Ini Files (*.ini)|*.ini|All files (*.*)|*.*'
  196.     Font.Color = clBlack
  197.     Font.Height = -11
  198.     Font.Name = 'MS Sans Serif'
  199.     Font.Style = [fsBold]
  200.     ParentFont = False
  201.     TabOrder = 3
  202.   end
  203.   object BatchList: TListBox
  204.     Left = 345
  205.     Top = 30
  206.     Width = 216
  207.     Height = 139
  208.     Hint = 'Double Click to Remove'
  209.     Font.Color = clBlack
  210.     Font.Height = -11
  211.     Font.Name = 'MS Sans Serif'
  212.     Font.Style = [fsBold]
  213.     ItemHeight = 13
  214.     MultiSelect = True
  215.     ParentFont = False
  216.     ParentShowHint = False
  217.     ShowHint = True
  218.     TabOrder = 2
  219.     OnDblClick = BatchListDblClick
  220.   end
  221.   object Cancel: TBitBtn
  222.     Left = 470
  223.     Top = 195
  224.     Width = 89
  225.     Height = 33
  226.     Font.Color = clWindowText
  227.     Font.Height = -11
  228.     Font.Name = 'MS Sans Serif'
  229.     Font.Style = [fsBold]
  230.     ParentFont = False
  231.     ParentShowHint = False
  232.     ShowHint = False
  233.     TabOrder = 5
  234.     OnClick = CancelClick
  235.     Kind = bkCancel
  236.   end
  237.   object Exit: TBitBtn
  238.     Left = 470
  239.     Top = 240
  240.     Width = 89
  241.     Height = 33
  242.     Caption = 'E&xit'
  243.     Font.Color = clWindowText
  244.     Font.Height = -11
  245.     Font.Name = 'MS Sans Serif'
  246.     Font.Style = [fsBold]
  247.     ParentFont = False
  248.     TabOrder = 6
  249.     OnClick = ExitClick
  250.     Glyph.Data = {
  251.       78010000424D7801000000000000760000002800000020000000100000000100
  252.       04000000000000000000120B0000120B00000000000000000000000000000000
  253.       800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
  254.       FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00330000000000
  255.       03333377777777777F333301111111110333337F333333337F33330111111111
  256.       0333337F333333337F333301111111110333337F333333337F33330111111111
  257.       0333337F333333337F333301111111110333337F333333337F33330111111111
  258.       0333337F3333333F7F333301111111B10333337F333333737F33330111111111
  259.       0333337F333333337F333301111111110333337F33FFFFF37F3333011EEEEE11
  260.       0333337F377777F37F3333011EEEEE110333337F37FFF7F37F3333011EEEEE11
  261.       0333337F377777337F333301111111110333337F333333337F33330111111111
  262.       0333337FFFFFFFFF7F33330000000000033333777777777773330000}
  263.     NumGlyphs = 2
  264.   end
  265.   object SaveAs: TSaveDialog
  266.     DefaultExt = 'ccw'
  267.     FileEditStyle = fsEdit
  268.     Filter = 'CCopy Batch (*.ccw)|*.ccw|All Files (*.*)|*.*'
  269.     Options = [ofOverwritePrompt, ofPathMustExist]
  270.     Left = 366
  271.     Top = 245
  272.   end
  273.   object Open: TOpenDialog
  274.     DefaultExt = 'ccw'
  275.     FileEditStyle = fsEdit
  276.     Filter = 'CCopy Batch (*.ccw)|*.ccw|All Files (*.*)|*.*'
  277.     Options = [ofPathMustExist, ofFileMustExist]
  278.     Left = 391
  279.     Top = 245
  280.   end
  281.   object BatchMenu: TMainMenu
  282.     Left = 340
  283.     Top = 245
  284.     object File1: TMenuItem
  285.       Caption = '&File'
  286.       ShortCut = 0
  287.       object New1: TMenuItem
  288.         Caption = '&New'
  289.         ShortCut = 0
  290.         OnClick = New1Click
  291.       end
  292.       object Open1: TMenuItem
  293.         Caption = '&Open...'
  294.         ShortCut = 0
  295.         OnClick = Open1Click
  296.       end
  297.       object Save1: TMenuItem
  298.         Caption = '&Save'
  299.         ShortCut = 0
  300.         OnClick = Save1Click
  301.       end
  302.       object SaveAsMenu: TMenuItem
  303.         Caption = 'Save &As...'
  304.         ShortCut = 0
  305.         OnClick = SaveAsMenuClick
  306.       end
  307.       object N1: TMenuItem
  308.         Caption = '-'
  309.         ShortCut = 0
  310.       end
  311.       object Exit1: TMenuItem
  312.         Caption = 'E&xit'
  313.         ShortCut = 0
  314.         OnClick = ExitClick
  315.       end
  316.     end
  317.   end
  318. end
  319.